home *** CD-ROM | disk | FTP | other *** search
/ Georgia Wildfire Prevention / Georgia Wildfire Prevention.iso / pc / media / dirs / BackUp / Credits.dir / 00008_Script_MovieTracker Behavior < prev    next >
Text File  |  2002-10-11  |  434b  |  20 lines
  1. --MOVIETRACKER BEHAVIOR
  2. --This behavior is used to test if the movie is over.
  3.  
  4. Property SpNum, MyMem, MyDur, MyName, guard
  5.  
  6. on new me
  7.   SpNum = me.spritenum
  8.   Mymem = sprite(SpNum).member.number
  9.   MyName = member(MyMem).name
  10.   MyDur = member(MyName).duration
  11.   guard = 0
  12. end
  13.  
  14. on timercheck me
  15.   if  sprite(SpNum).movietime = MyDur and guard = 0 then
  16.     sound(1).play(member("WFPIntro"))
  17.     guard = 1
  18.   end if
  19. end
  20.